home *** CD-ROM | disk | FTP | other *** search
/ Power CD / Power CD ATARI-Rechner Lieben.iso / DEMOS / HM2_DEMO / BSP / SAMPLE.CPX / RSC.M < prev    next >
Encoding:
Modula Implementation  |  1992-10-08  |  5.7 KB  |  101 lines
  1. IMPLEMENTATION MODULE RSC;
  2. (* generated by RSC2MOD v3.10 (c) 1992 Christian Sprenger *)
  3.  
  4. FROM SYSTEM IMPORT ADDRESS,CODE;
  5.  
  6. (*$D-*)(*$S-*)(*$P+*)
  7. PROCEDURE RData;
  8.  
  9. BEGIN
  10.  
  11.   CODE(00000H,0002CH,002FCH,00388H,00388H,00396H,00396H,00478H);
  12.  
  13.   CODE(00478H,00024H,0001EH,00002H,00005H,00000H,00001H,00000H);
  14.  
  15.   CODE(00000H,00554H,00000H,0002CH,00000H,001DCH,0FFFFH,00001H);
  16.  
  17.   CODE(0000DH,00014H,00040H,00000H,00000H,01141H,00000H,00000H);
  18.  
  19.   CODE(00020H,0000BH,00002H,0FFFFH,0FFFFH,0001BH,00040H,00000H);
  20.  
  21.   CODE(001FFH,01100H,0001DH,00000H,00702H,00001H,00003H,0FFFFH);
  22.  
  23.   CODE(0FFFFH,00019H,00000H,00000H,00000H,01100H,00018H,00700H);
  24.  
  25.   CODE(00003H,00008H,00004H,0FFFFH,0FFFFH,0001CH,00000H,00000H);
  26.  
  27.   CODE(00000H,00396H,00002H,00001H,00018H,00001H,00006H,00005H);
  28.  
  29.   CODE(00005H,00014H,00040H,00000H,000FFH,01111H,0001DH,00001H);
  30.  
  31.   CODE(00702H,00A06H,00004H,0FFFFH,0FFFFH,00016H,00040H,00000H);
  32.  
  33.   CODE(00000H,002FCH,00000H,00001H,00702H,00801H,00007H,0FFFFH);
  34.  
  35.   CODE(0FFFFH,00016H,00040H,00020H,00000H,00318H,00002H,00004H);
  36.  
  37.   CODE(0000FH,00001H,00008H,0FFFFH,0FFFFH,00016H,00005H,00030H);
  38.  
  39.   CODE(00000H,00334H,00015H,00004H,00005H,00001H,00009H,0FFFFH);
  40.  
  41.   CODE(0FFFFH,0001BH,00040H,00000H,004FFH,01100H,00000H,00B07H);
  42.  
  43.   CODE(00602H,00401H,0000BH,0000AH,0000AH,00014H,00040H,00000H);
  44.  
  45.   CODE(000FFH,01111H,00702H,00B07H,00117H,00401H,00009H,0FFFFH);
  46.  
  47.   CODE(0FFFFH,00016H,00040H,00000H,00000H,00350H,00702H,00000H);
  48.  
  49.   CODE(00103H,00401H,0000CH,0FFFFH,0FFFFH,0001BH,00040H,00000H);
  50.  
  51.   CODE(003FFH,01100H,0011AH,00B07H,00602H,00401H,0000DH,0FFFFH);
  52.  
  53.   CODE(0FFFFH,0001BH,00040H,00000H,002FFH,01100H,0001DH,00B07H);
  54.  
  55.   CODE(00702H,00401H,00000H,0000EH,00011H,00014H,00000H,00000H);
  56.  
  57.   CODE(000FFH,01100H,00000H,00009H,00020H,00002H,00010H,0000FH);
  58.  
  59.   CODE(0000FH,00014H,00000H,00000H,000FFH,01101H,00000H,00000H);
  60.  
  61.   CODE(0000AH,00002H,0000EH,0FFFFH,0FFFFH,0001AH,00005H,00000H);
  62.  
  63.   CODE(00000H,003AFH,00001H,00800H,00008H,00001H,00011H,0FFFFH);
  64.  
  65.   CODE(0FFFFH,0001AH,00007H,00000H,00000H,003B7H,0040BH,00800H);
  66.  
  67.   CODE(00008H,00001H,0000DH,0FFFFH,0FFFFH,0001AH,00025H,00000H);
  68.  
  69.   CODE(00000H,003BAH,00016H,00800H,00008H,00001H,0FFFFH,00001H);
  70.  
  71.   CODE(0000BH,00014H,00040H,00000H,00000H,01141H,00000H,00000H);
  72.  
  73.   CODE(00020H,0000BH,00005H,00002H,00004H,00014H,00000H,00000H);
  74.  
  75.   CODE(000FFH,01100H,00000H,00009H,00020H,00002H,00004H,00003H);
  76.  
  77.   CODE(00003H,00014H,00000H,00000H,000FFH,01101H,00000H,00000H);
  78.  
  79.   CODE(0000AH,00002H,00002H,0FFFFH,0FFFFH,00017H,00000H,00000H);
  80.  
  81.   CODE(00000H,00388H,00000H,00500H,0000AH,00601H,00001H,0FFFFH);
  82.  
  83.   CODE(0FFFFH,0001AH,00007H,00000H,00000H,003C2H,0040BH,00800H);
  84.  
  85.   CODE(00008H,00001H,0000BH,00006H,0000AH,00014H,00000H,00010H);
  86.  
  87.   CODE(000FFH,01101H,00003H,00F00H,0001AH,00007H,00007H,0FFFFH);
  88.  
  89.   CODE(0FFFFH,0001CH,00000H,00000H,00000H,003C5H,00001H,00001H);
  90.  
  91.   CODE(00018H,00001H,00008H,0FFFFH,0FFFFH,0001CH,00000H,00000H);
  92.  
  93.   CODE(00000H,003DEH,00001H,00002H,00016H,00001H,00009H,0FFFFH);
  94.  
  95.   CODE(0FFFFH,0001CH,00000H,00000H,00000H,003F5H,00001H,00003H);
  96.  
  97.   CODE(00018H,00001H,0000AH,0FFFFH,0FFFFH,0001CH,00000H,00000H);
  98.  
  99.   CODE(00000H,0040EH,00001H,00004H,00018H,00001H,00005H,0FFFFH);
  100.  
  101.   CODE(0FFFFH,0001CH,00000H,00000H,00000H,00427H,00001H,00005H);
  102.  
  103.   CODE(00012H,00001H,00000H,0FFFFH,0FFFFH,00015H,00020H,00000H);
  104.  
  105.   CODE(00000H,0036CH,00007H,00007H,00015H,00001H,00000H,0043AH);
  106.  
  107.   CODE(00000H,0043DH,00000H,0043EH,00003H,00006H,00002H,01180H);
  108.  
  109.   CODE(00000H,0FFFFH,00003H,00001H,00000H,0043FH,00000H,0044BH);
  110.  
  111.   CODE(00000H,0044CH,00003H,00006H,00002H,01180H,00000H,0FFFFH);
  112.  
  113.   CODE(0000CH,00001H,00000H,0044DH,00000H,00452H,00000H,00453H);
  114.  
  115.   CODE(00005H,00006H,00002H,01180H,00000H,0FFFFH,00005H,00001H);
  116.  
  117.   CODE(00000H,00454H,00000H,00457H,00000H,00458H,00003H,00006H);
  118.  
  119.   CODE(00002H,01180H,00000H,0FFFFH,00003H,00001H,00000H,00459H);
  120.  
  121.   CODE(00000H,00476H,00000H,00477H,00005H,00000H,00002H,01180H);
  122.  
  123.   CODE(00000H,00000H,0001DH,00001H,00000H,00478H,0000AH,00016H);
  124.  
  125.   CODE(00000H,00000H,00001H,05374H,0616EH,06461H,07264H,02D42H);
  126.  
  127.   CODE(06564H,06965H,06E65H,06C65H,06D65H,06E74H,0653AH,00053H);
  128.  
  129.   CODE(06963H,06865H,0726EH,0004FH,04B00H,04162H,06272H,07563H);
  130.  
  131.   CODE(06800H,04F4BH,00044H,06965H,07365H,07320H,04350H,05820H);
  132.  
  133.   CODE(06465H,06D6FH,06E73H,07472H,06965H,07274H,02C00H,07769H);
  134.  
  135.   CODE(06520H,06469H,06520H,05072H,06F67H,07261H,06D6DH,06965H);
  136.  
  137.   CODE(07275H,06E67H,00073H,06F6CH,06368H,06572H,0204BH,06F6EH);
  138.  
  139.   CODE(07472H,06F6CH,06C66H,0656CH,0642DH,04572H,02D00H,07765H);
  140.  
  141.   CODE(06974H,06572H,0756EH,06765H,06E20H,06D69H,07420H,04884H);
  142.  
  143.   CODE(06E69H,07363H,0682DH,0004DH,06F64H,0756CH,0612DH,03220H);
  144.  
  145.   CODE(06175H,07373H,06965H,06874H,02E00H,03030H,00000H,00058H);
  146.  
  147.   CODE(05858H,05858H,05858H,05858H,05858H,00000H,00048H,0454CH);
  148.  
  149.   CODE(05000H,00000H,03030H,00000H,00031H,0302FH,03932H,02043H);
  150.  
  151.   CODE(02E20H,05370H,07265H,06E67H,06572H,02C20H,04D6FH,05379H);
  152.  
  153.   CODE(07320H,04762H,05200H,00000H,00000H,00000H,003FCH,00000H);
  154.  
  155.   CODE(00000H,00000H,00000H,007FEH,00000H,00000H,00000H,00000H);
  156.  
  157.   CODE(00E07H,00000H,00000H,00000H,00000H,00C03H,00000H,00000H);
  158.  
  159.   CODE(0003CH,0F03FH,00C00H,03030H,0FF80H,0007FH,0F87FH,08E00H);
  160.  
  161.   CODE(03031H,0FF80H,000E7H,09CE1H,0C7FCH,03033H,08000H,000C3H);
  162.  
  163.   CODE(00CC0H,0C3FEH,03033H,08000H,000C3H,00CC0H,0C007H,03031H);
  164.  
  165.   CODE(0FF00H,000C3H,00CC0H,0C003H,03030H,0FF80H,000C3H,00CC0H);
  166.  
  167.   CODE(0CC03H,03030H,001C0H,000C3H,00CE1H,0CE07H,03830H,001C0H);
  168.  
  169.   CODE(000C3H,00C7FH,087FEH,01FF1H,0FF80H,000C3H,00C3FH,003FCH);
  170.  
  171.   CODE(00FF1H,0FF00H,00000H,00000H,00000H,00030H,00000H,00000H);
  172.  
  173.   CODE(00000H,00000H,00070H,00000H,003FFH,0FFFFH,0FFFFH,0FFE6H);
  174.  
  175.   CODE(04380H,003FFH,0FFFFH,0FFFFH,0FFC9H,04240H,00000H,00000H);
  176.  
  177.   CODE(00000H,00008H,07240H,00000H,00000H,00000H,0000BH,04B80H);
  178.  
  179.   CODE(00000H,00000H,00000H,00009H,04A40H,00000H,00000H,00000H);
  180.  
  181.   CODE(00006H,07240H);
  182.  
  183. END RData;
  184.  
  185. (*$P-*)(*$D=*)(*$S=*)
  186.  
  187. BEGIN
  188.   Data := ADDRESS(RData)
  189. END RSC.
  190.